home *** CD-ROM | disk | FTP | other *** search
/ Softdisk Supreme / Softdisk Supreme.iso / pc / DSK Files / 0-49 / SD019c.dsk / TCON.PROG.bas < prev    next >
BASIC Source File  |  2003-06-12  |  363b  |  8 lines
  1. 10 Q$ =  CHR$(34):D$ =  CHR$(4)
  2. 20  PRINT D$;"OPEN TCON"
  3. 30  PRINT D$;"WRITE TCON"
  4. 100  PRINT "0  D$ = CHR$(4) : PRINT D$;"Q$;" OPEN FILE";Q$; CHR$(13)
  5. 110  PRINT "1  PRINT D$;"Q$;"WRITE FILE";Q$;": LIST 3-"; CHR$(13)
  6. 120  PRINT "2  PRINT D$;"Q$;"CLOSE FILE";Q$;": END"; CHR$(13)
  7. 130  PRINT "RUN"
  8. 140  PRINT "0"; CHR$(13): PRINT "1"; CHR$(13): PRINT "2"; CHR$(13)